home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Plus 2000 #1
/
Amiga Plus CD - 2000 - No. 1.iso
/
Tools
/
Misc
/
InstallerNG
/
examples
/
sysinfo.installer
< prev
next >
Wrap
Text File
|
1999-12-03
|
1KB
|
37 lines
(user expert)
(set @proceed-button "Great configuration"
@abort-button "What the hell am I using ?!"
)
(procedure version-to-string #ver ("%ld.%ld" (/ #ver 65536) (bitand #ver 65535)))
; some information
(exit "Your configuration!\n\n\n"
"Installer version: " (version-to-string @installer-version) "\n"
"InstallerNG version: " (if @installer-ng-version (version-to-string @installer-ng-version) "No") "\n"
"\n---------------\n\n"
"CPU: " (database "CPU") "\n"
"PPC: " (database "PPC") "\n"
"FPU: " (database "FPU") "\n"
"MMU: " (database "MMU") "\n"
"\n"
"OS version: " (database "os-ver") "\n"
"\n"
("Todays date is %s\nAnd it`s %s o`clock\n" (database "date") (database "time"))
"\n"
"free CHIP: " (database "graphics-mem") "\n"
"free FAST: " (database "fast-mem") "\n"
"free total: " (database "total-mem") "\n"
"\n"
"Chipset: " (database "chiprev") "\n"
"Graphics System: " (database "gfxsystem") "\n"
"VBlank: " (database "vblank") "\n"
"\n"
"GUI: " (database "gui")
(quiet)
)
(welcome)